﻿Public Class Form1
  Private Sub Button1_Click(
        ByVal sender As System.Object,
        ByVal e As System.EventArgs) _
        Handles Button1.Click
    Me.WebBrowser3.Url = New Uri(Me.TextBox1.Text)
    Me.WebBrowser3.Refresh()
  End Sub
End Class
